proc msg:voice {nick host handle arg} {
global botnick 
  set argument [lindex $arg 0]
if {[string match "#*" $argument]} {
if {[validchan $argument]} {
  set chan $argument
  set otbn1 [lindex $arg 1]
  set botnet [lrange $arg 1 end]
  } else {
  putquick "NOTICE $nick :\0034ERROR - Channel Not Found - $argument could not be found in the channel partition."
  return 0
  }
  } else {
  putquick "NOTICE $nick :\0034ERROR - No Channel Specified - You need to specify a channel."
  return 0
  }
if {![matchattr $handle o|v $chan] && ![matchattr $handle o|o $chan]} {
  putquick "NOTICE $nick :Unable To Execute Command - Permission Denied."
  return 0
  }
if {![matchattr $handle A]} {
  putquick "NOTICE $nick :\0034ERROR - Unable To Execute Command - You need to authenticate first - Permission Denied."
  putquick "NOTICE $nick :You may authenticate yourself by typing \002/msg $botnick auth <your password>\002"
  return 0
  }
if {[matchattr $handle D]} {
  putquick "NOTICE $nick :Unable To Execute Command - Access Is Disabled - Permission Denied."
  return 0
  }
  voice $nick $handle $chan $otbn1 $host $botnet
  return 0
  }









